home *** CD-ROM | disk | FTP | other *** search
/ Aminet 52 / Aminet 52 (2002)(GTI - Schatztruhe)[!][Dec 2002].iso / Aminet / dev / gg / ncurses-5.3.lha / ncurses-5.3 / mkinstalldirs < prev    next >
Text File  |  2002-10-24  |  838b  |  39 lines
  1. #! /bin/sh
  2. # mkinstalldirs --- make directory hierarchy
  3. # Author: Noah Friedman <friedman@prep.ai.mit.edu>
  4. # Created: 1993-05-16
  5. # Last modified: 1994-03-25
  6. # Public domain
  7. #
  8.  
  9. errstatus=0
  10. umask 022
  11.  
  12. for file in ${1+"$@"} ; do
  13.    set fnord `echo ":$file" | sed -ne 's/^:\//#/;s/^://;s/\// /g;s/^#/\//;p'`
  14.    shift
  15.  
  16.    pathcomp=
  17.    for d in ${1+"$@"} ; do
  18.      pathcomp="$pathcomp$d"
  19.      case "$pathcomp" in
  20.        -* ) pathcomp=./$pathcomp ;;
  21.      esac
  22.  
  23.      if test ! -d "$pathcomp"; then
  24.         echo "mkdir $pathcomp" 1>&2
  25.         case "$pathcomp" in
  26.           [abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ]: )
  27.                 ;;               # DOSISH systems
  28.           * )          mkdir "$pathcomp" || errstatus=$? ;;
  29.         esac
  30.      fi
  31.  
  32.      pathcomp="$pathcomp/"
  33.    done
  34. done
  35.  
  36. exit $errstatus
  37.  
  38. # mkinstalldirs ends here
  39.